;      GENERAL.EQU	1/31/85	bjs

TRUE			EQU	-1
FALSE			EQU	0

HERCULES_CARD		EQU	TRUE
COLOR_CARD		EQU	FALSE

;	Set DISPLAY_TYPE equal to HERCULES_CARD or COLOR_CARD

DISPLAY_TYPE		EQU	COLOR_CARD

CR			EQU	0DH
LF			EQU	0AH

BIT0			EQU	1
BIT1			EQU	2
BIT2			EQU	4
BIT3			EQU	8
BIT4			EQU	16
BIT5			EQU	32
BIT6			EQU	64
BIT7			EQU	128

;	****** OBJECT NUMBERS ******

ENTOBJ			EQU	0
ENTTORP0		EQU	ENTOBJ+2
ENTTORP1		EQU	ENTTORP0+2
ENTTORP2		EQU	ENTTORP1+2
ENTTORP3		EQU	ENTTORP2+2
ENTTORP4		EQU	ENTTORP3+2
ENTTORP5		EQU	ENTTORP4+2
ENTTORP6		EQU	ENTTORP5+2
KLNOBJ			EQU	ENTTORP6+2
KLNTORP0		EQU	KLNOBJ+2
KLNTORP1		EQU	KLNTORP0+2
KLNTORP2		EQU	KLNTORP1+2
KLNTORP3		EQU	KLNTORP2+2
KLNTORP4		EQU	KLNTORP3+2
KLNTORP5		EQU	KLNTORP4+2
KLNTORP6		EQU	KLNTORP5+2
ENDOBJ			EQU	KLNTORP6+2


IF DISPLAY_TYPE

MAX_X_AXIS		EQU	720		; Hercules Card Horizontal resolution
MAX_Y_AXIS		EQU	348		; Hercules Card Vertical resolution

ROCKET_WIDTH		EQU	16
ROCKET_HEIGTH		EQU	16

TORP_WIDTH		EQU	8
TORP_HEIGTH		EQU	8

EXPLODE_WIDTH		EQU	8
EXPLODE_HEIGTH		EQU	8

PLANET_WIDTH		EQU	32
PLANET_HEIGTH		EQU	32

CHAR_WIDTH		EQU	10
CHAR_HEIGTH		EQU	16

TITLE_WIDTH		EQU	16
TITLE_HEIGTH		EQU	16

DOTS_BASE		EQU	0B000H
DOT_SIZEB		EQU	08000H
DOT_SIZEW		EQU	DOT_SIZEB/2

LINE_STEP_SIZE 		EQU	2000H		
LINE_WRAP_COUNT		EQU	4

ELSE

MAX_X_AXIS		EQU	640		; Color Card Horizontal resolution
MAX_Y_AXIS		EQU	200		; Color Card Vertical resolution

ROCKET_WIDTH		EQU	16
ROCKET_HEIGTH		EQU	16

TORP_WIDTH		EQU	8
TORP_HEIGTH		EQU	8

EXPLODE_WIDTH		EQU	8
EXPLODE_HEIGTH		EQU	8

PLANET_WIDTH		EQU	32
PLANET_HEIGTH		EQU	32

CHAR_WIDTH		EQU	10
CHAR_HEIGTH		EQU	8

TITLE_WIDTH		EQU	16
TITLE_HEIGTH		EQU	8

DOTS_BASE		EQU	0B800H
DOT_SIZEB		EQU	04000H
DOT_SIZEW		EQU	DOT_SIZEB/2

LINE_STEP_SIZE 		EQU	2000H		
LINE_WRAP_COUNT		EQU	2


ENDIF

MAX_X_CHARS		EQU	MAX_X_AXIS/CHAR_WIDTH
MAX_Y_CHARS		EQU	MAX_Y_AXIS/CHAR_HEIGTH


ROW_SIZE		EQU	MAX_X_AXIS/8	; in bytes

MAX_X_VELOCITY		EQU	8
MAX_Y_VELOCITY		EQU	8

WRAP_FACTOR		EQU	8
